Top 10k strings from Skatteberegning (1983)(ZX Data)(dk).z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 *U1)+P7+P8+P9+P0)*Q)/Q
   2 C7=C1+(C2)
   2 ;"TRAEKPROCENT";
   2 ;"FOR ";H$;":"
   2 ;"FOR ";D$;":"
   2 ;", DER SKAL INDREGNES?";
   2  (HERAF ERHVERV):
   1 ~|~|~<B>B<<
   1 ~|~B~<B>B<<
   1 TRYK ENTER:
   1 SKATTEPROCENTH
   1 SKATTEBEREGNINGF
   1 L$;"FOR ";N$;" (";H$(
   1 K$;"0 PAA NAESTE SKAERMBILLEDE"
   1 HOVEDPERSONENm
   1 E7=E5-(E7*60
   1 E7=(B6-U2)*22
   1 E6=E7/B6*B8
   1 E6=E6-(E5/B6*B8)
   1 E5>B9-(B9*60
   1 E5=E5-(D8*78
   1 E5=D0+E2+D9+E7
   1 E5=D0+E2+D7+E7
   1 E5=B9-(B9*60
   1 E5=(D7-D5)-(C4*78
   1 E4=(E3-D8)-((D6-E2)*M/D0)
   1 DEN GIFTE KVINDEE
   1 D9=D9-(E7/B6*B8)
   1 D9=D9+(D7)
   1 D8=C6+(B2)
   1 D8=C4+(B5)
   1 D7=D7-(E7/B6*B7)
   1 D7=D7+(D9)
   1 D7-D5<C4*78
   1 D6=D6-F2-E6
   1 D6=D6-F1-B9
   1 D6;" KR.";
   1 D6-F2-E6<M
   1 D6-F1-B9<M
   1 D5=D5-(C8*P9)/M
   1 D5=C7*P9/M
   1 D3=D3-(C8*(P7+P8)/M)
   1 D3=C7*(P7+P8)/M
   1 D2=D2-(C8*P0/M)
   1 D2=C7*P0/M
   1 D1=D1-(C8*16
   1 D1=D1-((C7-P2)*(P7+P8-E1)/M)
   1 D1=((C7-P2)*44
   1 D1=((C7-P1)*32
   1 D0=D0*M/C7
   1 C2=C2+(C3-A(6
   1 C1=C1-C3-A(6
   1 B9=E7/B6*B7
   1 B9=B9-(E5/B6*B7)
   1 B9=(B6-U2)*22
   1 B7+B8>U2+99
   1 B5=B5-(E4)
   1 B5=B5+(B4)
   1 B4=B4+(E4)
   1 B2=B2-(E4)
   1 B2=B2+(B1)
   1 B1=B1+(E4)
   1 B-SKAT HELE AARET 
   1 AEGTEFAELLEG
   1 A-INDKOMST:
   1 ;O$;"FOR";
   1 ;O$;":  ";F1+B9;" KR."
   1 ;O$;"  ";F2+E6;" KR."
   1 ;M$;"SLQN FORUD, ";K$;"01 OG   ";M$;"EN EFTER DEN ";M$;" DU LA-VER ";N$;"EN I"
   1 ;M$;"SLQN BAGUD, ";K$;"01 OG   DEN ";M$;" DU LAVER ";N$;"EN I"
   1 ;L$;"OG ";M$;" SKRIVES MED 4 TAL(EKS. 1. MAJ = 0105)"
   1 ;K$;L$;"OG ";M$;":"
   1 ;K$;H$;"S KIRKE";G$(
   1 ;K$;H$;"S INDREGNEDE RESTSKAT FRA ";F5-2
   1 ;K$;H$;"S FORMUEANDEL"
   1 ;K$;D$;"S KIRKE-";
   1 ;K$;D$;"S INDREG-";
   1 ;K$;D$;"S FORMUE- ANDEL"
   1 ;K$;"TAL TIL VENSTRE ELLER 0:  "
   1 ;K$;"KOMMUNE";G$;"EN"
   1 ;K$;"DEN AMTSKOMMUNALE ";G$(
   1 ;K$;"BETALT A-SKAT TIL ";L$;"   (SE SIDSTE LQNSEDDEL)"
   1 ;K$;"BELQBETS STQRRELSE:
   1 ;K$;"ATP-BELQBETS STQRRELSE"
   1 ;K$;"A-INDKOMST (LQN) TIL ";L$;"(SE SIDSTE LQNSEDDEL)"
   1 ;K$;" FORMUENS STQRRELSE"
   1 ;H$;"S NETTOSKAT UDGQR:";
   1 ;F5;": ";K$;"0101"
   1 ;D9;" KR."
   1 ;D7;" KR."
   1 ;D$;"S NETTOSKAT UD- GQR: ";
   1 ;"VED INDKOMSTAARETS BEGYNDELSE?";
   1 ;"SKATTEKORT FOR ";H$
   1 ;"SKATTEKORT FOR ";D$
   1 ;"SKAL DER FORETAGES BEREGNING AF"
   1 ;"QNSKER DU FLERE ";E$(
   1 ;"QNSKER DU AT BEREGNE SKATTEKORT?";
   1 ;"PROGRAM";
   1 ;"POSITIV INDKOMST, DEN ANDEN HAR NEGATIV."
   1 ;"PENSION?";
   1 ;"PAA NAESTE SKAERMBILLEDE KOMMER" 
   1 ;"NEDE RESTSKAT FRA ";F5-2
   1 ;"MAKSIMAL A-INDKOMST PAA FRIKORT FOR"
   1 ;"HELE KALENDERAARET?";
   1 ;"HAR ";F$;"RNE VAERET GIFT";
   1 ;"FRADRAG:"
   1 ;"FIK ";H$;" RESTSKAT I ";
   1 ;"FIK ";D$;" RESTSKAT I ";F5-2
   1 ;"FEJL: DEN ENE ";F$;" HAR";
   1 ;"FAAR ";H$;" ATP-PENSION?";
   1 ;"FAAR ";D$;" ATP-PENSI-";
   1 ;"ER PERSONEN UDMELDT AF FOLKEKIR-"
   1 ;"ER FORMUEN STQRRE END ";U2+99
   1 ;"ER ";N$;"S";L$;"1. JANUAR ";F5;" ELLER SENERE:"
   1 ;"ER ";N$;"S";L$;" FQR 1. JANUAR";
   1 ;"ER ";H$;" TILKENDT PEN-";
   1 ;"ER ";H$;" FYLDT 67 AAR"
   1 ;"ER ";F$;"RNES SAMLEDE FOR- MUE STQRRE END ";U2+99
   1 ;"ER ";D$;" TILKENDT";
   1 ;"ER ";D$;" FYLDT 67 AAR"
   1 ;"EN ";H$(
   1 ;"BEMAERK:"
   1 ;"BEGYND FORFRA OG KIG PAA";
   1 ;"ALLE TAL VEDRQRER INDKOMSTAARET"
   1 ;"ALLE ANDRE SKRIVER ";L$;"OG MAA- NED FOR LQNPERIODENS START"
   1 ;"(HVIS DU FORTRQD, SAA BRUG IKKE RUN, MEN GO TO 1)"
   1 ;" 16 ";A$(16
   1 /M*U1)+(P1*16
   1 /M*U1)+((P2-P1)*32
   1 /M*U1)+((P1*16
   1 );"- PROCENT"
   1 );"- GER?";
   1 );" ER EN MAND ELLER EN UGIFT KVINDE"
   1 (ja/nej):I
   1 (E4*D0/M))
   1 (E3-((D6-E2)*M/D0)))-D8;" KR.";
   1 (C7/M)*M)-F3)/M*M/2
   1 (B5/M)*M)+(
   1 (B5/M)*M)*(P0+P7+P8)/M
   1 (B2/M)*M)+(
   1 (B2/M)*M)*(P0+P7+P8)/M
   1 ((D1+D3+D5)*M+.5
   1 ((D1+D2+D3+D5)*M+.5
   1 "skat1983"
   1 "STARTER DU ALTID MED ";H$(
   1 "REGNET ER GIFT, SKAL DU SKRIVE"
   1 "PERSONFRADRAG.";
   1 "OG FRADRAG, DER KAN INDGAA I DIN"
   1 "KEN SKRIVER DU 0"
   1 "JA, SELVOM ";D$
   1 "IKKE HAR INDKOMST. DET SKAL DU"
   1 "HVIS PERSONEN DER LIGE ER BE-"
   1 "HVIS DU IKKE HAR FLERE BELQB TIL"
   1 "HVIS ";E$;"EN SKAL"
   1 "FORETAGES FOR GIFTE PERSONER,"
   1 "FOR AT DER KAN BEREGNES KORREKT"
   1 "EN OVERSIGT OVER DE INDKOMSTER"
   1 "EN ";F$;" (GIFT KVINDE)?"
   1 " PR. UGE";
   1 " PR. DAG";
   1 " PR. 14-DAG";
   1 " PR. ";M$;
   1  VIRKSOMHEDSOVERSKUD:   RENTEINDTAEGTER:
   1  UNDERSK UDLEJN EJD:    VIRKSOMHEDSUNDERSKUD:  LQNMODTAGERFRADRAG:    FORSIKRINGSFRADRAG M.V.OVERFQRT UNDERSKUD:    RENTEUDGIFTER:
   1  SKATTEGODTGQRELSE:
   1  OVERSK UDLEJN EJD:
   1  MEDHJ AEGTEF INDKOMST: AKTIEUDBYTTE:
   1  MEDHJ AEGTEF FRADRAG:  
   1  EJENDOMSUNDERSKUD:
   1  EJENDOMSOVERSKUD:
   1  B-INDKOMST: